NEW  NIST  PUBLICATION 


U.S.  DEPARTMENT  OF  COMMERCE 
National  Institute  of  StandanJs  and  Technology 


NISTIR  4407 


March  1991 


National  PDES  Testbed 

Re|X)rt  Series 


MIST  Expi^ss 


s 


Reference 


Revised  Novembei^  1990 


NATIONALS 

- r 

ik 

TESTBED 


U.S.  DEPARTMENT  OF  COMMERCE 
National  Institute  of  Standards  and  Technology 


NISTIR  4407 


National  PDES  Testbed 
Report  Series 


TESTBED 


NIST  Express 
Working  Form 
Programmer's 
Reference 


Stephen  Nowland  Clark 


U.S.  DEPARTMENT  OF 
COMMERCE 
Robert  Ac  Mosbac±ier, 
Secretary  of  Commerce 


National  Institute  of 
Standards  and  Technology 
John  W.  Lyons,  Director 


November  29, 1990 


Disclaimer 

No  approval  or  endorsement  of  any  commercial  product  by  the  National  Institute  of 
Standards  and  Technology  is  intended  or  implied 

Unix  is  a trademark  of  AT&T  Technologies,  Inc. 

Smalltalk-80  is  a trademark  of  ParcPlace  Systems,  Inc. 


Table  Of  Contents 


1 Introduction 

1.1  Context 1 

2 Fed-X  Control  Flow 1 

2.1  First  Pass:  Parsing .2 

2.2  Second  Pass:  Reference  Resolution 2 

2.3  Third  Pass:  Output  Generation .....3 

3 Working  Form  Implementation 3 

3.1  Primitive  Types .............4 

3.2  Symbol  and  Construct .........4 

3.3  Express  Working  Form  Manager  Module 4 

3.4  Code  Organization  and  Conventions 4 

3.5  Memory  Management  and  Garbage  Collection ........5 

4 Writing  An  Output  Module .......5 

4.1  Layout  of  the  C Source .......6 

4.2  Traversing  a Schema ..............7 

4.3  Output  Module  Linkage  Mechanisms ...............................8 

5 Working  Form  Routines ,c..9 

5. 1 Working  Form  Manager .9 

5.2  Algorithm .10 

5.3  Case  Item ...12 

5.4  Constant 13 

5.5  Construct 14 

5.6  Entity..... 14 

5.7  Expression ..18 

5.8  Loop  Control 24 

5.9  Schema 26 

5.10  Scope......... ....26 

5.11  Statement .......29 

5.12  Symbol ...33 

5.13  Type 34 

5.14  Variable 40 

6 Express  Working  Form  Error  Codes 42 

Appendix  A:  References .47 


iii 


NIST  Express  Working  Form 
Programmer’s  Reference 

Stephen  Nowland  Clark 


1 Introduction 

The  NIST  Express  Working  Form  [Clark90b],  with  its  associated  Express  parser, 
Fed"X,  is  a Public  Domain  set  of  software  tools  for  manipulating  information  models 
written  in  the  Express  language  [Schenck90].  The  Express  Working  Form  (WF)  is  part 
of  the  NIST  PDFS  Toolkit  [Clark90a].  This  reference  manual  discusses  the  internals 
of  the  Working  Form,  including  the  Fed-X  parser.  The  information  presented  will  be 
of  use  to  programmers  who  wish  to  write  applications  based  on  the  Working  Form,  in- 
cluding output  modules  for  Fed-X,  as  well  as  those  who  will  maintain  or  modify  the 
Working  form  or  Fed-X.  The  reader  is  assumed  to  be  familiar  with  the  design  of  the 
Working  Form,  as  presented  in  [Clark90b]. 

1.1  Context 

The  PDES  (Product  Data  Exchange  using  STEP)  activity  is  the  United  States’  effon  in 
support  of  the  Standard  for  the  Exchange  of  Product  Model  Data  (STEP),  an  emerging 
international  standard  for  the  interchange  of  product  data  between  various  vendors’ 
CAD/CAM  systems  and  other  manufacturing-related  software  [SmithSS].  A National 
PDES  Testbed  has  been  established  at  the  National  Institute  of  Standards  and  Technol- 
ogy to  provide  testing  and  validation  facilities  for  the  emerging  standard.  The  Testbed 
is  funded  by  the  CALS  (Computer-aided  Acquisition  and  Logistic  Support)  program  of 
the  Office  of  the  Secretary  of  Defense.  As  pan  of  the  testing  effon,  NIST  is  charged 
with  providing  a software  toolkit  for  manipulating  PDES  data.  This  NIST  PDES  Tool- 
kit is  an  evolving,  research-oriented  set  of  software  tools.  This  document  is  one  of  a set 
of  repons  which  describe  various  aspects  of  the  Toolkit.  An  overview  of  the  Toolkit  is 
provided  in  [Clark90a],  along  with  references  to  the  other  documents  in  the  set. 

For  funher  information  on  the  Express  Working  Form  or  other  components  of  the  Tool- 
kit, or  to  obtain  a copy  of  the  software,  use  the  attached  order  form. 

2 Fed-X  Control  Flow 

A Fed-X  translator  consists  of  three  separate  passes:  parsing,  reference  resolution,  and 
output  generation.  The  first  two  passes  can  be  thought  of  as  a single  unit  which  pro- 
duces an  instantiated  Working  Form.  This  Working  Form  can  be  traversed  by  an  output 
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module  in  the  third.  It  is  anticipated  that  users  will  need  output  formats  other  than  those 
provided  with  the  NIST  Toolkit.  The  process  of  writing  a report  generator  for  a new 
output  format  is  discussed  in  detail  in  section  4. 

2.1  First  Pass:  Parsing 

The  first  pass  of  Fed-X  is  a fairly  straightforward  parser,  written  using  the  Unix"^*^  pars- 
er generation  languages,  Yacc  and  Lex.  As  each  construct  is  parsed,  it  is  added  to  the 
Working  Form.  No  attempt  is  made  to  resolve  symbol  references:  they  are  represented 
by  instances  of  the  type  Symbol  (see  below),  which  are  replaced  in  the  second  pass 
with  the  referenced  objects. 

The  grammar  used  by  Fed-X  is  processed  by  Bison,  a Yacc  clone  available  from  the 

Free  Software  Foundation.  The  lexical  analyzer  is  processed  by  Flex,^  a fast.  Public 
Domain  implementation  of  Lex.  The  analyzer  makes  use  of  one  feature  of  Flex  which 
us  not  present  in  Lex:  it  uses  an  exclusive  start  condition  to  scan  comments  properly. 
The  scanner  can  easily  be  rewritten  to  use  only  standard  start  conditions  if  it  is  neces- 
sary to  use  Lex.  Other  differences  between  Lex  and  Flex  are  handled  properly  by  con- 
ditional compilation  (#  if  def  .o  #endif  pairs). 

2o2  Second  Pass:  Reference  Resolution 

The  reference  resolution  pass  of  Fed-X  walks  through  the  Working  Form  built  by  the 
parser  and  attempts  to  replace  each  Symbol  with  the  object  to  which  it  refers.  The 
name  of  each  symbol  is  looked  up  in  the  scope  which  is  in  effect  at  the  point  of  refer- 
ence. If  a definition  for  the  name  is  found  which  makes  sense  in  the  current  context, 
the  definition  replaces  the  symbol  reference.  Otherwise,  Fed=X  prints  an  error  message 
and  proceeds. 

In  some  cases,  the  changes  which  must  be  made  when  a symbol  is  resolved  are  slightly 
more  drastic.  For  example,  the  syntax  of  Express  does  not  distinguish  between  an  iden- 
tifier and  an  invocation  of  a function  of  no  arguments.  When  a token  could  be  inter- 
preted as  either,  the  parser  always  guesses  that  it  is  a simple  identifier.  When  the  second 
pass  determines  that  one  of  these  objects  actually  refers  to  a function,  the 
Identifier  expression  is  replaced  by  an  appropriate  Function_Call  expres- 
sion. 


L The  Free  Software  Foundation  (FSF)  of  Cambridge,  Massachusetts  is  responsible  for  the  GNU  Project, 
whose  ultimate  goal  is  to  provide  a free  implementation  of  the  Unix  operating  system  and  environment. 
These  tools  are  not  in  the  Public  Domain:  FSF  retains  ownership  and  copyright  priviledges,  but  grants  free 
distribution  rights  under  certain  terms.  At  this  writing,  further  information  is  available  via  electronic  mail  on 
the  Internet  from  gnu@prep.ai.mit.edu. 

2.  Vem  Paxson’s  Flex  is  usually  distributed  with  GNU  software,  although,  being  in  the  Public  Domain,  it  does 
not  come  under  the  FSF  licensing  restrictions. 
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Thus,  the  result  of  the  second  pass  (in  the  absence  of  any  errors)  is  a tightly  linked  set 
of  structures  in  which,  for  example,  Function_Call  expressions  reference  the 
called  Algorithms  directly.  At  this  point,  it  is  possible  to  traverse  the  data  structures 
without  resorting  to  any  funher  symbol  table  lookups.  The  scopes  in  the  Working  Form 
are  only  needed  to  resolve  external  references  - e.g.,  from  a STEP  physical  file. 

2.3  Third  Pass:  Output  Generation 

The  report  or  output  generation  pass  manages  the  production  of  the  various  output  files. 
In  the  dynamically  Linked  version  of  Fed-X,  this  pass  loads  successive  output  modules, 
calling  each  one  to  traverse  the  Working  Form.  The  dynamic  linking  mechanism  is  dis- 
cussed briefly  in  [Clark90c].  It  is  also  possible  to  build  a statically  linked  translator, 
with  a particular  output  module  loaded  in  at  build  time;  this  is,  at  present,  the  only 
mechanism  available  in  an  environment  which  is  not  derived  from  BSD  4.2  Unix. 

A report  generator  is  an  object  module,  most  likely  written  in  C,  which  has  been  com- 
piled as  a component  module  for  a larger  program  (i.e.,  with  the  -c  option  to  a Unix  C 
compiler).  In  a dynamically  linked  translator,  this  object  module  is  linked  into  the  run- 
ning parser,  and  its  entry  point  (by  convention  a function  called  print_file  ( ) ) is 
called.  The  code  of  this  module  consists  of  calls  to  Express  Working  Form  access  func- 
tions and  to  standard  output  routines.  A detailed  description  of  the  creation  of  a new 
output  module  appears  in  section  4. 

3 Working  Form  Implementation 

The  Express  Working  Form  data  abstractions  are  implemented  in  ANSI  Standard  C 
[ANSI89].  Each  abstraction  is  implemented  as  one  or  more  classes,  using  the 
Class/Object  modules  in  libmisc  [Clark90c].  The  data  specific  to  a particular 
class  is  encasulated  in  a private  C struct.  This  structure  is  never  manipulated  direct- 
ly outside  of  the  abstraction’s  module.  For  example: 

/*  the  actual  contents  of  a Foo  */ 
struct  Foo  { 
int  i; 
double  d; 

}; 


typedef  Object  Foo; 

/*  Class_Foo  is  created  in  FOOinitialize  ( ) */ 

Class  Class_Foo/ 

Outside  of  Foo’s  module,  we  will  never  see  a struct  Foo.  We  will  only  see  a Foo, 
which  is  actually  an  Object  which  ultimately  points  at  a struct  Foo. 
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3.1  Primitive  Types 

The  Express  Working  Form  makes  use  of  several  modules  from  the  Toolkit  general  li- 
braries, including  the  Class,  Object,  Error,  Linked_List,  and  Dictionary  modules. 
These  are  described  in  [Clark90c].  The  underlying  representation  for  all  of  the  Work- 
ing Form  abstractions  makes  use  of  the  Class  and  Object  modules. 

3c2  Symbol  and  Construct 

The  types  Symbol  and  Construct  are,  in  Object-Oriented  terminology,  abstract  su- 
pertypes for  the  various  types  in  the  Working  Form.  The  two  are  quite  similar,  both  in 
concept  and  in  implementation.  Both  have  an  attribute  containing  the  line  number  on 
which  the  represented  construct  appears  in  the  source  file  (probably  useful  only  within 
Fed-X).  A Symbol  also  includes  a name  and  a flag  indicating  whether  the  symbol  has 
been  resolved. 

Abstractions  which  represent  namable  objects  are  subclassed  from  Symbol.  These  in- 
clude Constant,  Type,  Variable,  Algorithm,  Entity,  and  Schema.  The  lat- 
ter three  are  actually  subclasses  of  another  Symbol  subclass,  Scope.  Other 
abstractions  (Case_Item,  Expression,  Loop_Control,  and  Statement)  are 
subclassed  from  Construct. 

3.3  Express  Working  Form  Manager  Module 

In  addition  to  the  abstractions  discussed  in  [Clark90b],  libexpress.a  contains  one 
more  module,  the  package  manager.  Defined  in  express  . c and  express  . h,  this 
module  includes  calls  to  intialize  the  entire  Express  Working  Form  package,  and  to  run 
each  of  the  passes  of  a Fed-X  translator. 

3.4  Code  Organization  and  Conventions 

Each  abstraction  is  implemented  as  a separate  module.  Modules  share  only  their  inter- 
face specifications  with  other  modules.  There  is  one  exception  to  this  rule:  In  order  to 
avoid  logistical  problems  compiling  circular  type  definitions  across  modules,  an  Ex- 
press Working  Form  module  includes  any  other  Working  Form  modules  it  uses  after 
defining  its  own  private  struct.  Thus,  the  types  defined  by  these  other  modules  are 
not  yet  known  at  the  time  an  abstraction’s  private  struct  is  defined,  and  references 
to  these  other  Working  Form  types  must  assume  knowledge  of  their  implementations. 
This  is,  in  fact,  not  a serious  limitation:  All  of  the  Working  Form  types  are  implemented 
as  Objects,  which  is  defined  when  the  struct  is  compiled. 

A module  Foo  is  composed  of  two  C source  files,  f o o . c and  f o o . h.  The  former  con- 
tains the  body  of  the  module,  including  all  non-inlined  functions.  The  latter  contains 
function  prototypes  for  the  module,  as  well  as  all  type  and  macro  definitions.  In  addi- 
tion, global  variables  are  defined  here,  using  a mechanism  which  allows  the  same  dec- 
larations to  be  used  both  for  extern  declarations  in  other  modules  and  the  actual 
storage  definition  in  the  declaring  module.  These  globals  can  also  be  given  constant 
initializers.  Finally,  f oo  . h contains  inline  function  definitions.  In  a compiler  which 
supports  inline  functions,  these  are  declared  static  inline  in  every  module  which 
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# includes  foo  .h,  including  foo  . c itself.  In  other  compilers,  they  are  undefined 
except  when  included  in  f oo  . c,  when  they  are  compiled  as  ordinary  functions, 
foo  . c resides  in  -pdes/src/express/;  foo  .h  in  -pdes/include/. 

The  type  defined  by  module  Foo  is  named  Foo,  and  its  private  structure  is  struct 
Foo.  Access  functions  are  named  as  FOO  function  ( ) ; this  function  prefix  is  abbre- 
viated for  longer  abstraction  names,  so  that  access  functions  for  type 
Foolhardy_Bartender  might  be  of  the  form  FOO_BARfunction  ( ) . Some 
functions  may  be  implemented  as  macros;  these  macros  are  not  distinguished  typo- 
graphically from  other  functions,  and  are  guaranteed  not  to  have  unpleasant  side  effects 
like  evaluating  arguments  more  than  once.  These  macros  are  thus  virtually  indistin- 
guishable from  functions.  Functions  which  are  intended  for  internal  use  only  are  named 
FOO_function  ( ) , and  are  usually  static  as  well,  unless  this  is  not  possible.  Glo- 
bal variables  are  often  named  FOO_variable;  most  enumeration  identifiers  and  con- 
stants are  named  FOO_CONSTANT  (although  these  latter  two  rules  are  by  no  means 
universal).  For  example,  every  abstraction  defines  a constant  FOO_NULL,  which  rep- 
resents an  empty  or  missing  value  of  the  type. 

If  an  instance  of  Foo  might  contain  unresolved  Symbols,  then  there  is  a function 
FOOresolve  (...),  called  during  Fed-X’s  second  pass,  which  attempts  to  resolve 
all  such  references  and  reports  any  errors  found.  This  call  may  or  may  not  require  a 
Scope  as  a parameter,  depending  on  the  abstraction.  For  example,  an  Algorithm 
defines  its  own  local  Scope,  from  which  the  next  outer  Scope  (in  which  the 
Algorithm  is  defined)  can  be  determined;  ALGresolve  ( ) thus  requires  no  Scope 
parameter.  A Type,  on  the  other  hand,  has  no  way  of  getting  at  its  Scope,  so 
TYPEresolve  ( ) requires  a second  parameter  indicating  the  Scope  in  which  the 
Type  is  to  be  resolved. 

3.5  Memory  Management  and  Garbage  Collection 

In  reading  various  portions  of  the  Express  Working  Form  documentation,  one  may  get 
the  impression  that  the  Working  Form  does  some  reasonably  intelligent  memory  man- 
agement. This  is  not  entirely  true.  The  NIST  PDES  Toolkit  is  primarily  a research  tool. 
This  is  especially  true  of  the  Express  and  STEP  Working  Forms.  The  Working  forms 
allocate  huge  chunks  of  memory  without  batting  an  eye,  and  this  memory  often  is  not 
released  until  an  application  exits.  Hooks  for  doing  memory  management  do  exist  (e.g., 
OB  Jf  ree  ( ) and  reference  counts),  and  some  attempt  is  made  to  observe  them,  but  this 
is  not  given  high  priority  in  the  current  implementation. 

4 Writing  An  Output  Module 

It  is  expected  that  a common  use  of  the  Express  WF  will  be  to  build  Express  translators. 
The  Fed-X  control  flow  was  designed  with  this  application  in  mind.  A programmer 
who  wishes  to  build  such  a translator  need  only  write  an  output  module  for  the  target 
language.  We  now  turn  to  the  topic  of  writing  this  output  module.  The  end  result  of 
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the  process  described  will  be  an  object  module  (under  Unix,  a . o file)  which  can  be 
loaded  into  Fed-X.  This  module  contains  a single  entry  point  which  traverses  a given 
Schema  and  writes  its  output  to  a particular  file. 

The  stylistic  convention  taken  in  the  existing  output  modules,  and  which  meshes  most 
cleanly  with  the  design  of  the  Working  Fom  data  structures,  is  to  define  a procedure 
FOOprint  (Foo  foo,  FILE*  file)  corresponding  to  each  Working  Form  ab- 
straction. Thus,  SCHEMAprint  (Schema  schema,  FILE*  file)  is  the  con- 
ceptual entry  point  to  the  output  module;  an  Algorithm  is  written  by  the  call 
ALGprint  (Algorithm  algorithm,  FILE*  f ile) , etc.  With  this  break- 
down, most  of  the  actual  output  is  generated  by  the  routines  for  Type,  Entity,  and 
other  concrete  Express  constructs.  The  routines  for  Schema  and  Scope,  on  the  other 
hand,  control  the  traversal  of  the  data  structures,  and  produce  little  or  no  actual  output. 
For  this  reason,  it  is  probably  useful  to  base  new  report  generators  on  existing  ones, 
copying  the  traversal  logic  wholesale  and  modifying  only  the  routines  for  the  concrete 
objects.  The  Fed-X-QDES  output  module  (which  can  be  found  in 
-pdes/src/ fedex_qdes/output__smalltalk . c)  has  been  annotated  for  this 
purpose,  although  the  traversal  logic  has  become  somewhat  convoluted,  due  to  pecu- 
liarities of  Smalltalk-80'^^. 

4.1  Layout  of  the  C Source 

The  layout  of  the  C source  file  for  a report  generator  which  will  be  dynamically  loaded 
is  of  critical  importance,  due  to  the  primitive  level  at  which  the  load  is  carried  out.  The 
very  first  piece  of  C source  in  the  file  must  be  the  entry_point  ( ) function,  or  the 
loader  may  find  the  wrong  entry  point  to  the  file,  resulting  in  mayhem.  Only  comments 
may  precede  this  function;  even  an  # include  directive  may  throw  off  the  loader. 
An  output  module  is  normally  layed  out  as  shown: 

void 

entry__point  (void*  schema,  void*  file) 

{ 

extern  void  print_f ile  ( ) / 
print_f ile (schema,  file); 

} 

#include  ’’express, h” 

. . . actual  output  routines  . . . 


void 

print_file (void*  schema,  void*  file) 

{ 

print_f ile_header ( (Schema) schema, 

(FILE*) file) ; 

SCHEMAprint ( (Schema) schema,  (FILE*) file) ; 
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print_f ile_trailer ( (Schema) schema. 


The  print_f  ile  ( ) function  will  probably  always  be  quite  similar  to  the  one  shown, 
although  in  many  cases,  the  file  header  and/or  trailer  may  well  be  empty,  eliminating 
the  need  for  these  calls.  In  this  case,  SCHEMAprint  ( ) and  print_f  ile  ()  will 
probably  become  interchangeable. 

Having  said  all  of  the  above  about  templates,  code  layout,  and  so  fonh,  we  add  the  fol- 
lowing note:  In  the  final  analysis,  the  output  module  really  is  a free-form  piece  of  C 
code.  There  is  one  and  only  one  rule  which  must  be  followed,  and  this  only  if  the  repn 
generator  will  be  dynamically  loaded:  The  entry  point  (according  to  the  a . out  format) 
to  the  . o file  which  is  produced  when  the  report  generator  is  compiled  must  be  appro- 
priate to  be  called  with  a Schema  and  a FILE*.  The  simplest  (and  safest)  way  of  do- 
ing this  is  to  adhere  strictly  to  the  layout  given,  and  write  an  ent  ry_pcint  ( ) routine 
which  jumps  to  the  real  (conceptual)  entry  point.  But  any  other  mechanism  which  guar- 
antees this  propeny  may  be  used.  Similarly,  the  layout  of  the  rest  of  the  code  is  purely 
conventional.  There  is  no  a priori  reason  to  write  one  output  routine  per  data  structure, 
or  to  use  the  print_f  ile  ( ) routine  suggested.  This  approach  has  simply  proved  to 
work  nicely  for  current  and  past  repon  generators,  and  seems  to  provide  the  shonest 
path  to  a new  output  module.  In  other  words,  if  you  don’t  like  the  previous  authors’ 
coding  style(s),  feel  free  to  muck  around! 

4.2  Traversing  a Schema 

Following  the  one-routine-per-abstraction  rule,  there  are  two  general  classes  of  output 
routines.  Those  corresponding  to  primitive  Express  constructs  (ENTITYprint  ( ) , 
TYPEprint  ( ) , VARprint  ( ) ) will  produce  most  of  the  actual  output,  while 
SCOPEprint  ( ) (and,  to  a lesser  extent  SCHEliAprint  ( ) ) will  be  responsible  for 
traversing  the  instantiated  working  form.  A typical  definition  for  SCOPEprint  ( ) 
would  be: 

void 

SCOPEprint (Scope  scope,  FILE*  file) 

{ 

Linked_List  list; 

list  = SCOPEget_types (scope)  ; 

LISTdodist,  type.  Type) 

TYPEprint  (type,  file) ; 

LISTod; 

LISTfree  (list) ; 

list  = SCOPSget_entities (scope) ; 

LISTdodist,  ent.  Entity) 

ENTITYprint  (ent,  file)  ; 
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LISTod; 

LISTfree (list) ; 

list  = SCOPEget_algorithms (scope) ; 

LISTdo(list,  alg,  Algorithm) 

ALGprint (alg,  file) ; 

LISTod; 

LISTfree  (list) ; 

list  = SCOPEget_variables  (scope) ; 

LISTdo(list,  var.  Variable) 

VARprint (var,  file) ; 

LISTod; 

LISTfree  (list) ; 

list  = SCOPEget_schemata (scope) ; 

LISTdodist,  schema.  Schema) 

SCEMAprint (schema,  file) ; 

LISTod; 

LISTfree  (list) ; 

} 

This  function  traverses  the  model  from  the  outermost  schema  inward.  All  types,  enti- 
ties, algorithms,  and  variables  in  a schema  are  printed  (in  that  order),  followed  by  all 
definitions  for  any  sub-schemas.  The  only  traversal  logic  required  in 
SCHEMAprint  ( ) is  simply  to  call  SCOPEprint  ( ) . 

An  approach  which  is  taken  in  the  Fed-X-QDES  output  module  is  to  divide  the  logical 
functionality  of  SCOPEprint  ( ) into  two  separate  passes,  implemented  by  functions 
SCOPEprint_passl  ( ) and  SC0PEprint_pass2  ( ) . The  first  pass  prints  all  of 
the  entity  definitions,  in  superclass  order  (i.e.,  subclasses  are  not  printed  until  after  their 
superclasses),  without  attributes.  This  is  necessary  because  of  some  difficulties  with 
forward  references  in  Smalltalk- 80.  The  second  pass  then  looks  much  like  the  sample 
definition  of  SCOPEprint  ( ) given  above.  This  multi-pass  strategy  could  also  be 
used  to  print,  for  example,  all  of  the  type  and  entity  definitions  in  the  entire  model,  fol- 
lowed by  all  variable  and  algorithm  definitions. 

4o3  Output  Module  Linkage  Mechanisms 

One  of  the  powers  of  Fed-X  is  the  flexibility  which  it  gives  a user  with  regard  to  gen- 
erating output.  An  important  component  of  this  flexibility  on  BSD  Unix  systems  is  the 
dynamic  loading  of  output  modules.  Both  static  and  dynamic  binding  of  output  mod- 
ules are  supported  by  Fed-X.  This  is  implemented  by  providing  two  distinct  versions 
of  the  Working  Form  manager.  Code  common  to  both  versions  (including  initialization 
code  and  the  first  two  passes  of  Fed-X)  is  found  in  express  . c,  which  is  included  by 
each  of  the  distinct  manager  modules.  The  static  linking  version  of  the  third  pass,  with- 
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out  any  output  module,  is  in  express_static  . c,  and  the  corresponding 
express_static  . o is  included  in  libexpress  . a,  making  it  the  default;  the  dy- 
namic loading  version  is  in  express_dynamic  . c. 

Since  express_static . o and  express_dynamic  . o both  define  the  function 
EXPRESSpass_3  ( ) , only  one  is  linked  into  any  given  executable.  This  selection  is 
what  determines  whether  a Fed-X  translator  links  in  output  modules  statically  or  dy- 
namically. By  default,  the  linkage  mechanism  will  be  express_static . o,  which 
actually  appears  in  the  Working  Form  library.  This  choice  can  be  overridden  by  placing 
express_dynamic  . o before  libexpress  . a in  the  link  command.  Note  that  a 
suitable  output  module  ( . o file)  must  appear  after  express_stat  ic  . o in  the  link- 
er’s argument  list  when  a statically  linked  translator  is  being  built.  For  more  informa- 
tion on  how  to  build  a report  generator  into  a Fed-X  translator,  see  [Clark90c]. 


5 


5.1 


Working  Form  Routines 


The  remainder  of  this  manual  consists  of  specifications  and  brief  descriptions  of  the  ac- 
cess routines  and  associated  error  codes  for  the  Express  Working  Form.  The  error 
codes  are  manipulated  by  the  Error  module  [Clark90d].  Each  subsection  below  corre- 
sponds to  a module  in  the  Working  Form  library.  The  Working  Form  Manager  module 
is  listed  first,  followed  by  the  remaining  data  abstractions  in  alphabetical  order. 


Working  Form  Manager 

Type:  Express 


Procedure: 

Parameters: 

Returns: 

Description: 


EXPRESS  dump_model 

Express  model  - Express  model  to  dump 

void 

Dump  an  Express  model  to  stderr.  This  call  is  provided  for  debugging  purposes. 


Procedure: 

Parameters: 

Returns: 

Description: 


EXPRESSfree 

Express  model  - Express  model  to  free 
void 

Release  an  Express  model.  Indicates  that  the  model  is  no  longer  used  by  the  caller;  if 
there  are  no  other  references  to  the  model,  all  storage  associated  with  it  may  be 
released. 


Procedure: 

Parameters: 

Returns: 

Description: 


EXPRES  S initialize 

- none  ~ 

void 

Initialize  the  Express  package.  This  call  in  turn  initializes  all  components  of  the 
Working  Form  package.  Normally,  it  is  called  instead  of  calling  all  of  the  individual 
XXXinitialize  ( ) routines.  In  a typical  Express  (or  STEP)  translator,  this 
function  is  called  by  the  default  main  ( ) provid^  in  the  Working  Form  library.  Other 
applications  should  call  it  at  initialization  time. 
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Procedure; 

EXPRESSpass.l 

Parameters: 

Returns; 

Description: 

FILE*  file  - Express  source  file  to  parse 

Express  - resulting  Working  Form  model 

Parse  an  Express  source  file  into  the  Working  Form,  No  symbol  resolution  is 
performed 

Procedure; 

Parameters; 

Returns; 

Description; 

EXPRESSpass_2 

Express  model  - Working  Form  model  to  resolve 
void 

Perform  symbol  resolution  on  a loosely-coupled  Working  Form  model  (which  was 
probably  created  by  EXPRESSpass_l  ( ) ). 

Procedure; 

Parameters: 

Returns: 

Description: 

EXPRESSpass_3 

Express  model  - Working  Form  model  to  report 

FILE*  file  - output  file 
void 

Invoke  one  (or  more)  report  generator(s),  according  to  the  selected  linkage 
mechanism. 

Procedure: 

Parameters; 

Returns; 

Description; 

PASS2initialize 

- none  - 

void 

Initialize  the  Fed-X  second  pass. 

5.2  Algorithm 

Type; 

Supertype; 

Subtypes; 

Algorithm 

Scope 

Function,  Procedure,  Rule 

Procedure; 

Parameters: 

Returns; 

Description; 

ALGget_body 

Algorithm  algorithm  - algorithm  to  examine 

Linked_List  - body  of  algorithm 

Retrieve  the  code  body  of  an  algorithm.  The  elements  of  the  list  returned  are 
Statements, 

Procedure; 

Parameters; 

Returns; 

ALGget_name 

Algorithm  algorithm  - algorithm  to  examine 

String  - the  name  of  the  algorithm 

Procedure: 

Parameters; 

Returns; 

Description; 

ALGgetj)arameters 

Algorithm  algorithm  - algorithm  to  examine 

Linked_List  - formal  parameter  list 

Retrieve  the  formal  parameter  list  for  an  algorithm.  When 

ALGget  class  (algorithm)  ==  ALG  RULE,  the  returned  list  contains  the 
Ent  i t ys  to  which  the  rule  applies.  Otherwise,  it  contains  Variables  specifying  the 
formal  parameters  to  the  function  or  procedure. 

NIST  Express  Working  Form  Programmer’s  Reference 


Page  10 


Stephen  Nowland  Clark 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 


ALGinitialize 
“ none  -- 
void 

Initialize  the  Algorithm  module.  This  is  called  by  EXPRESSinitialize  () , and  so 
normally  need  not  be  called  individually. 

ALGput_body 

Algorithm  algorithm  - algorithm  to  modify 
Linked_List  statements  - body  of  algorithm 
void 

Set  the  code  body  of  an  algorithm.  The  second  parameter  should  be  a list  of 
Statements. 

ALGput_name 

Algorithm  algorithm  - algorithm  to  modify 
String  name  - new  name  for  algorithm 
void 

Set  the  name  of  an  algorithm. 

ALGput_parameters 

Algorithm  algorithm  - algorithm  to  modify 
Linked_List  list  ■=  formal  parameters  for  this  algorithm 
void 

Set  the  formal  parameter  list  of  an  algorithm.  When 

ALGget_class  (algorithm)  ==  ALG_RULE,  the  formal  parameters  should  be 
the  Entitys  to  which  the  rule  applies.  Otherwise,  they  should  be  Variables. 

ALGresolve 

Algorithm  algorithm  - algorithm  to  resolve 
Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  references  in  an  algorithm  definition.  This  is  called,  in  due  course,  by 
EXPRESSpass_2  () . 

FUNCget_retum_type 

Function  function  - function  to  examine 

Type  " function’s  return  type 

FUNCput_retum_type 
Function  function  - function  to  modify 
Type  type  - the  function’s  return  type 
void 

Set  the  return  type  of  a function. 
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Procedure: 

RULEget_where_clause 

Parameters: 

Returns: 

Rule  rule  - rule  to  examine 

Linked_List  - list  of  rule’s  WHERE  clause  constraints 

Procedure: 

Parameters: 

Returns: 

Description: 

RULEput_where_cIause 

Rule  rule  ■>  rule  to  modify 

Linked_List  where  - list  of  WHERE  clause  constraints  for  rule 
void 

Set  the  where  clause  of  a rule 

5.3  Case  Item 

Type: 

Supertype: 

Case_Item 

Construct 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

CASE_ITcreate 

Linked_List  of  Expression  labels  - list  of  case  labels 

Statement  statement  - statement  associated  with  this  branch 

Error*  errc  - buffer  for  error  code 

Case_.Item  - the  case  item  created 

Create  a new  case  item.  If  the  ’labels  ’ parameter  is  L l S T_null,  a case  item  matching 
in  the  default  case  is  created.  Otherwise,  the  case  item  created  will  match  when  the 
case  selector  has  the  same  value  as  any  of  the  Expressions  on  the  labels  list. 

— none  -- 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE„ITget_labels 

Case_Item  item  - case  item  to  examine 

Linked_List  - list  of  case  labels 

Retrieve  the  list  of  label  Expressions  for  which  a case  item  matches.  For  an  item 
which  matches  in  the  default  case,  list__null  is  returned. 

Procedure: 

Parameters: 

Returns: 

Description: 

C ASE_ITget_statement 

Case_Item  item  - the  case  item  to  examine 

Statement  - statement  associated  with  this  branch 

Retrieve  the  statement  to  be  executed  when  this  case  item  is  matched. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITinitialize 
- none  - 

void 

Initialize  the  Case  Item  module.  This  is  called  by  EXPRESS  initialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASE_ITresolve 

Case_Item  item  = case  item  to  resolve 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a case  item.  This  is  called,  in  due  course,  by 
EXPRESSpass_2  {) . 
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5.4  Constant 


Type: 

Constant 

Supertype: 

Symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTcreate 

String  name  - name  of  new  constant 

Type  type  - type  of  new  constant 

Generic  value  - value  for  new  constant 

Constant  - the  constant  created 

Create  a new  constant. 

Procedure: 

Parameters: 

Returns: 

CSTget_name 

Constant  constant  - constant  to  examine 

String  - the  name  of  the  constant 

Procedure: 

Parameters: 

Returns: 

CSTget_type 

Constant  constant  - constant  to  examine 

Type  - the  type  of  the  constant 

Procedure: 

Parameters: 

Returns: 

CSTget_value 

Constant  constant  - constant  to  examine 

Generic  - the  value  of  the  constant 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTinitialize 

— none  - 

void 

Initialize  the  Constant  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTput_name 

Constant  constant  - constant  to  modify 

String  - name  for  constant 
void 

Set  the  name  of  a constant 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTput_type 

Constant  constant  - constant  to  modify 

Type  - type  for  constant 
void 

Set  the  type  of  a constant 

Procedure: 

Parameters: 

Returns: 

Description: 

CSTput_value 

Constant  constant  - constant  to  modify 

Generic  - value  of  constant 
void 

Set  the  value  of  a constant 
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5.5  Construct 


Type: 

Construct 

Supertype: 

- none  -- 

Procedure: 

Parameters: 

Returns: 

CONSTRget_line_number 

Construct  construct  - construct  to  examine 
int  - line  number  of  construct 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRinitialize 

- none  -- 

void 

Initialize  the  Construct  module.  This  is  called  by  EXPRESSinitialize  () , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

CONSTRput_line„number 

Construct  construct  - construct  to  modify 
int  number  - line  number  for  construct 
void 

Set  a construct’s  line  number. 

5.6  Entity 

Type: 

Supertype: 

Entity 

Scope 

Procedure: 

Parameters: 

Returns: 

ENTITY  add„attribute 

Entity  entity  - entity  to  modify 

Variable  attribute  - attribute  to  add 
void 

Procedure: 

Parameters: 

Returns: 

ENTITY  addjnstance 

Entity  entity  - entity  to  modify 

Generic  instance  = new  instance 
void 

Procedure: 

Parameters: 

Returns: 

ENTITY  delete_instance 

Entity  entity  - entity  to  modify 

Generic  instance  - instance  to  delete 
void 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_all_attributes 

Entity  entity  - entity  to  examine 

Linked_List  of  Variable  - all  attributes  of  this  entity 

Retrieve  the  complete  attribute  list  of  an  entity.  The  attributes  are  ordered  as  required 
by  the  STEP  Physical  File  format  [AltemeullerSS].  This  list  should  be  LiSTf  ree’d 
when  no  longer  needed. 
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Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_attribute_offset 

Entity  entity  - entity  to  examine 

Variable  attribute  - attribute  to  retrieve  offset  for 
int  - offset  to  given  attribute 

Retrieve  offset  to  an  entity  attribute.  This  offset  takes  into  account  all  superclass  of  the 
entity;,  it  is  computed  by  ENT  ITYget  initial  offset  (entity)  + 

VARget  offset  (attribute) . If  the  entity  does  not  include  the  attribute,  -1  is 
returned.  This  call  should  be  preferred  over 

ENTITYget  named  attribute  offset  (). 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_attributes 

Entity  entity  - entity  to  examine 

Linked_List  of  Variable  - local  attributes  of  this  entity 

Retrieve  the  local  attribute  list  of  an  entity.  The  local  attributes  of  an  entity  are  those 
which  are  defined  by  the  entity  itself  (rather  than  being  inherited  from  supertypes). 
This  list  should  be  LISTf  ree’d  when  no  longer  needed. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_constraints 

Entity  entity  - entity  to  examine 

Linked_List  of  Expression  - this  entity’s  constraints 

Retrieve  the  list  of  constraints  from  an  entity’s  "where"  clause.  This  list  should  nm  be 
LISTfree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_initial_offset 

Entity  entity  - entity  to  examine 
int  - number  of  inherited  attributes 

Retrieve  the  initial  offset  to  an  entity’s  local  frame.  This  is  the  total  number  of  explicit 
attributes  inherited  from  supertypes. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  getjnstances 

Entity  entity  - entity  to  examine 

Linked_List  - list  of  instances  of  the  entity 

Retrieve  an  entity’s  instance  list.  This  list  should  not  be  LISTfree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_mark 

Entity  entity  - entity  to  examine 
int  - entity’s  current  mark 

Retrieve  an  entity’s  mark.  See  ENTiTYput_mark  ( ) . 

Procedure: 

Parameters: 

Returns: 

ENTITY  get_name 

Entity  entity  - entity  to  examine 

String  - entity  name 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_named_attribute 

Entity  entity  - entity  to  examine 

String  name  - name  of  attribute  to  retrieve 

Variable  - the  named  attribute  of  this  entity 

Retrieve  the  definition  of  an  entity  attribute  by  name.  If  the  entity  has  no  attribute  with 
the  given  name,  VARIABLE_NULL  is  returned. 
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Procedure: 

Parameters: 

ENTITY  get_named_attribute_offset 

Entity  entity  - entity  to  examine 

String  name  - name  of  attribute  for  which  to  retrieve  offset 

Returns: 

Description: 

int  - offset  to  named  attribute  of  this  entity 

Retrieve  the  offset  to  an  entity  attribute  by  name.  If  the  entity  has  no  attribute  with  the 
given  name,  - 1 is  returned.  This  call  is  slower  than 

ENTlTYget___attribute_of  f set  ( ) , and  so  should  be  avoided  when  the  actual 
attribute  defimtion  is  already  available. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_size 

Entity  entity  - entity  to  examine 
int  - storage  size  of  instantiated  entity 

Compute  the  storage  size  of  an  instantiation  of  this  entity.  This  is  the  total  number  of 
attributes  which  it  contains. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITYget_subtype„expression 

Entity  entity  - entity  to  examine 

Expression  - immediate  subtype  expression 

Retrieve  the  controlling  expression  for  an  entity’s  immediate  subtype  list. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get„subtypes 

Entity  entity  - entity  to  examine 

Linked_.List  of  Entity  - immediate  subtypes  of  this  entity 

Retrieve  a list  of  an  entity’s  immediate  subtypes. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_supertypes 

Entity  entity  - entity  to  examine 

Linked„List  of  Entity  - immediate  supertypes  of  this  entity 

Retrieve  a list  of  an  entity’s  immediate  supertypes.  This  list  should  not  be 
LISTfree’d. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITY  get_uniqueness_list 

Entity  entity  - entity  to  examine 

Linked_List  of  Linked_List  - this  entity’s  uniqueness  sets 

Retrieve  an  entity’s  uniqueness  list.  Each  element  of  this  list  is  itself  a list  of 

Va  r iables,  specifying  a uniqueness  set  for  the  entity.  The  uniqueness  list  should  not 
be  LISTfree’d,  nor  should  any  of  the  component  lists. 

Procedure: 

Parameters: 

ENTITYhas_immediate„subtype 

Entity  parent  - entity  to  check  children  of 

Entity  child  - child  to  check  for 

Returns: 

Boolean  ■=  is  child  a direct  subtype  of  parent? 

Procedure: 

Parameters: 

ENTITYhas_im  media  te_supertype 

Entity  child  - entity  to  check  parentage  of 

Entity  parent  - parent  to  check  for 

Returns: 

Boolean  - is  parent  a direct  supertype  of  child? 

Procedure: 

Parameters: 

ENTITYhas_sub  type 

Entity  parent  - entity  to  check  descendants  of 

Entity  child  - child  to  check  for 

Returns: 

Boolean  - does  parent’s  subclass  tree  include  child? 
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Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


ENTITYhas_supertype 

Entity  child  - entity  to  check  parentage  of 

Entity  parent  - parent  to  check  for 

Boolean  - does  child’s  superclass  chain  include  parent? 

ENTITYinitialize 
- none  -- 
void 

Initialize  the  Entity  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

ENTITYput_constraints 
Entity  entity  - entity  to  modify 

Linked_List  constraints  - list  of  constraints  which  entity  must  sadsfy 
void 

Set  the  constraints  on  an  entity.  The  elements  of  the  constraints  list  should  be 
Expressions  of  type  TY_LOGICAL. 

ENTITYput_inheritance_count 
Entity  entity  - entity  to  modify 
int  count  - number  of  inherited  attributes 
void 

Set  the  number  of  attributes  inherited  by  an  entity.  This  should  be  computed 
automatically  (perhaps  only  when  needed),  and  this  call  removed.  The  count  is 
currently  computed  by  ENTiTYresolve  ( ) . 

ENTITY  put_mark 
Entity  entity  - entity  to  modify 
int  value  - new  mark  for  entity 
void 

Set  an  entity’s  mark.  This  mark  is  used,  for  example,  in  SCOPE_df  s ( ) , part  of 
SCOPEget_entities_superciass_orcier  ( ) , to  mark  each  entity  as  having 
been  touched  by  the  traversal. 

ENTITY  put_name 
Entity  entity  - entity  to  modify 
String  name  - entity’s  name 
void 

Set  the  name  of  an  entity. 

ENTITY  put_subtypes 

Entity  entity  - entity  to  modify 

Experssion  expression  - controlling  subtype  expression 

void 

Set  the  (immediate)  subtypes  list  of  an  entity. 

ENTITYput_supertypes 
Entity  entity  - entity  to  modify 
Linked_List  list  - superclass  entities 
void 

Set  the  (immediate)  supertype  list  of  an  entity.  The  elements  of  the  list  should  be 
Entitys  or  (unresolved)  Symbols. 
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Procedure: 

ENTITYput_uniqueness_list 

Parameters: 

Entity  entity  - entity  to  modify 

Linked_List  list  - uniqueness  list 

Returns: 

Description: 

void 

Set  the  uniqueness  list  of  an  entity.  Each  element  of  the  uniqueness  list  should  itself 
be  a list  of  Variables  and/or  (unresolved)  Symbols  referencing  entity  attributes. 
Each  of  these  sublists  specifies  a single  uniqueness  set  for  the  entity. 

Procedure: 

Parameters: 

Returns: 

Description: 

ENTITYresolve 

Entity  entity  - entity  to  resolve 
void 

Resolve  all  symbol  references  in  an  entity  definition.  This  function  is  called,  in  due 
course,  by  EXPRESSpass_2  ( ) . 

5,7  Expression 

Type:  Expression 


Supertype: 

Construct 

Private  Type: 
Supertype: 

Ary_Expression 

Expression 

Type: 

Supertype: 

B inary_.Expression 

Ary_Expression 

Type: 

Supertype: 

Unary  „Expression 

Ary_Expression 

Type: 

Supertype: 

One_Of_Expression 

Expression 

Type: 

Supertype: 

Function_Call 

One_Of„Expression 

Type: 

Supertype: 

Identifier 

Expression 

Private  Type: 
Supertype: 

Literal 

Expression 

Type: 

Supertype: 

Aggregate_Literal 

Literal 

Type: 

Supertype: 

Integer_Literal 

Literal 

Type: 

Supertype: 

Logical_Literal 

Literal 
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Type: 

Supertype: 

Real_Literal 

Literal 

Type: 

Supertype: 

String_Literal 

Literal 

Type: 

Supertype: 

Query 

Expression 

Constant: 

Type: 

LITERAL_EMPTY_SET  - a generic  set  literal  representing  the  empty  set 
Aggregate_Literal 

Constant: 

Type: 

LITERAL_INFINITY  - a numeric  literal  representing  infinity 
Integer_Literal 

Constant: 

Type: 

LITERAL_PI  - a real  literal  with  the  value  3.1415... 

Real_Literal 

Constant: 

Type: 

LITERAL_ZERO  - an  integer  literal  with  the  value  0 

Integer_Literal 

Procedure: 

Parameters: 

AGGR_LIT  create 

Type  type  - type  of  aggregate  literal  to  be  created 

Linked_List  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Aggregate_Literal  - the  literal  created 

Create  an  aggregate  literal  expression. 

--  none  -- 

Procedure: 

Parameters: 

AGGR_LITget_value 

Aggregate_Literal  literal  - aggregate  literal  to  examine 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Linked_List  of  Generic  - the  literal’s  contents 

Retrieve  the  value  of  an  aggregate  literal,  as  a list. 

--  none  -- 

Procedure: 

Parameters: 

BIN_EXPcreate 

Op_Code  op  - operation 

Expression  operand  1 - first  operand 

Expression  operand2  - second  operand 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Binary_Expression  - the  expression  created 

Create  a binary  operation  expression. 

- none  “■ 

Procedure: 

Parameters: 

Returns: 

B IN_EXPget_first_operand 

Binary_Expression  expression  - expression  to  examine 

Expression  - the  first  (left-hand)  operand  of  the  expression 
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Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


B IN_EXPget_operator 

Binary_Expression  expression  - expression  to  examine 
Op_Code  - the  operator  invoked  by  the  expression 

B IN_EXPget_second_operand 

Binary_Expression  expression  - expression  to  examine 

Expression  - the  second  (right-hand)  operand  of  the  expression 

EXPas_string 

Expression  expression  - expression  to  print  as  string 
String  - string  representation  of  expression 

Generate  the  string  representation  of  an  expression.  Only  (qualified)  identifiers  are 
currently  supported. 

EXPget_integer_value 

Expression  expression  - expression  to  evaluate 
Error*  errc  - buffer  for  error  code 
int  - value  of  expression 

Compute  the  value  of  an  integer  expression.  Currently,  only  integer  literals  can  be 
evaluated;  other  classes  of  expressions  evaluate  to  0 and  produce  a warning  message. 
EXPRESS I0N_NULL  evaluates  to  0,  as  well. 
ERROR_integer__expression_expected 

EXPget_type 

Expression  expression  - expression  to  examine 

Type  - the  type  of  the  value  computed  by  the  expression 

EXPinitialize 
— none  -- 
void 

Initialize  the  Expression  module.  This  is  called  by  EXPRESSinitialize  ( ) , and 
so  normally  need  not  be  called  individually. 

EXPput_type 

Expression  expression  - expression  to  modify 

Type  type  - the  type  of  result  computed  by  the  expression 

void 

Set  the  type  of  an  expression.  This  call  should  actually  be  unnecessary;  the  type  of  an 
expression  is  derivable  from  its  definidon.  While  this  is  currently  true  in  the  case  of 
literals,  there  are  no  rules  in  place  for  deriving  the  type  from,  for  example,  the  return 
type  of  a function  or  and  operator  together  with  its  operands. 

EXPresolve 

Expression  expression  - expression  to  resolve 
Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  an  expression.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ()  . 
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Procedure: 

Parameters: 

EXPresolve_qualification 

Expression  expression  - expression  to  resolve 

Scope  scope  - scope  in  which  to  resolve 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Symbol  - the  symbol  referenced  by  the  expression 

Retrieves  the  symbol  definition  referenced  by  a (possibly  qualified)  identifier. 

Procedure: 

Parameters: 

FCALLcreate 

Algorithm  algorithm  - algorithm  invoked  by  expression 

Linked_List  parameters  - actual  parameters  to  funcdon  call 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Function_Call  - the  function  call  created 

Create  a function  call  expression. 

— none  -- 

Procedure: 

Parameters: 

Returns: 

FCALLget_algorithm 

Function_Call  expression  - function  call  expresion  to  examine 

Algorithm  - the  algorithm  invoked  by  the  function  call 

Procedure: 

Parameters: 

Returns: 

Description: 

FCALLget_parameters 

Function_Call  expression  - function  call  expression  to  examine 

Linked_List  of  Expression  - list  of  actual  parameters 

Retrieve  the  actual  parameter  Expressions  from  a function  call  expression. 

Procedure: 

Parameters: 

FCALLput_algorithm 

Function_Call  expression  - function  call  expression  to  modify 

Algorithm  algorithm  - algorithm  invoked  by  expression 

Returns: 

Description: 

void 

Set  the  algorithm  invoked  by  a function  call  expression. 

Procedure: 

Parameters: 

FCALLput_parameters 

Function_Call  expression  - function  call  expression  to  modify 

Linked^List  parameters  - list  of  actual  parameters 

Returns: 

Description: 

void 

Set  the  actual  parameter  list  to  a function  call  expression.  The  elements  of  the 
parameter  list  should  be  Expressions.  The  types  of  the  actual  parameters  currently 
are  not  verified  against  the  formal  parameter  list  of  the  called  algorithm. 

Procedure: 

Parameters: 

IDENTcreate 

Symbol  ident  - idendfier  referenced  by  expression 

Error*  errc  = buffer  for  error  code 

Returns: 

Description: 

Errors: 

Idendfier  - the  idendfier  expression  created 

Create  a simple  identifier  expression. 

--  none  - 

Procedure: 

Parameters: 

Returns: 

IDENT  get_identifier 

Identifier  expression  - expression  to  examine 

Symbol  - the  idendfier  referenced  in  the  expression 
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Procedure: 

Parameters: 

Returns: 

Description: 

IDENTput_identifier 

Identifier  expression  - identifier  expression  to  modify 
Symbol  identifier  - the  referent  of  the  identifier 
void 

Set  the  referent  of  an  identifier  expression. 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

INT_LITcreate 

Integer  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

Integer_Literal  - the  literal  created 

Create  an  integer  literal  expression. 

--  none  -- 

Procedure: 

Parameters: 

Returns: 

Errors: 

INT_LITget_value 

Integer_Literal  literal  - integer  literal  to  examine 

Error*  errc  - buffer  for  error  code 

Integer  - the  literal’s  value 
— none  =- 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

LOG„LITcreate 

Logical  value  - value  for  literal 

Error*  errc  - buffer  for  error  code 

Logical_Literal  - the  literal  created 

Create  a logical  literal  expression. 

- none  -- 

Procedure: 

Parameters: 

Returns: 

Errors: 

LOG_LITget_value 

LogicaLLiteral  literal  = logical  literal  to  examine 

Error*  errc  » buffer  for  error  code 

Logical  - the  literal’s  value 
- none  -- 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

ONEOFcreate 

Linked_List  selections  - list  of  selections  for  oneofQ 
Error*  errc  - buffer  for  error  code 

One_Of_Expression  - the  oneof  expression  created 
Create  a oneofQ  expression. 

--  none  - 

Procedure: 

Parameters: 

Returns: 

ONEOFget_selec  tions 

One_Of_Expression  expression  - expression  to  examine 
Linked_List  of  Expression  - list  of  selections  for  oneofQ 

Procedure: 

Parameters: 

Returns: 

Description: 

ONEOFput_selections 

One_Of_Expression  expression  - expression  to  modify 
Linked_List  selections  = list  of  selections  for  oneofQ 
void 

Set  the  list  of  selections  for  a oneofQ  expression. 
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Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 


Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Description: 

Errors: 


OPget_number_of_operands 

Op_Code  operadon  - the  opcode  to  query 

int  - number  of  operands  required  by  this  operator. 

QUERYcreate 

String  idem  - local  idendfier  for  source  elements 

Expression  source  - source  aggregate  to  query 

Expression  discriminant  - discriminadng  expression  for  query 

Error*  errc  - buffer  for  error  code 

Query  - the  query  expression  created 

Create  a query  expression. 

- none  -- 

QUERY  get_discriminant 

Query  expression  - query  expression  to  examine 

Expression  - the  discriminant  expression 

Retrieves  the  discriminant  expression  from  a query  expression.  The  discrim ihant 
expresses  the  query  criteria. 

QUERY  get_source 

Query  expression  - query  expression  to  examine 
Expression  - the  source  aggregadon 

Retrieves  the  expression  which  computes  the  aggregation  against  which  a query  will 
be  applied. 

QUERY  get_variable 

Query  expression  - query  expression  to  examine 
Variable  - the  local  iteration  variable  of  the  query 

REAL_LITcreate 
Real  value  - value  for  literal 
Error*  errc  - buffer  for  error  code 
Real_Literal  - the  literal  created 
Create  a real  literal  expression. 

- none 

REAL_LITget_value 

Real_Literal  literal  - real  literal  to  examine 
Error*  errc  • buffer  for  error  code 
Real  - the  literal’s  value 

- none  -- 

STR_LITcreate 
String  value  - value  for  literal 
Error*  errc  - buffer  for  error  code 
String_Literal  - the  literal  created 
Create  a string  literal  expression. 

- none  - 
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Procedure: 

STR_LITget_value 

Parameters: 

String_Literal  literal  - string  literal  to  examine 

Error*  errc  - buffer  for  error  code 

Returns: 

Errors: 

String  “ the  literal’s  value 
“ none  - 

Procedure: 

Parameters: 

UN_EXPcreate 

C)p_Code  op  “ operation 

Expression  operand  - operand 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Errors: 

Unary _Expression  - the  expression  created 

Create  a unary  operation  expression. 

--  none  - 

Procedure: 

Parameters: 

Returns: 

UN„EXPget_operand 

Unary _Expression  expression  - expression  to  examine 
Expression  - the  operand  of  the  expression 

Procedure: 

Parameters: 

Returns: 

UN_EXPget_operator 

Unary_Expression  expression  - expression  to  examine 
Op_Code  - the  operator  invoked  by  the  expression 

5.8  Loop  Control 

Type:  Loop_Control 


Supertype: 

Construct 

Type: 

Supertype: 

Increment_Control 

Loop_Control 

Private  Type: 
Supertype: 

Conditional_Control 

Loop_Control 

Type: 

Supertype: 

UntiLControl 

Condi  tional_Control 

Type: 

Supertype: 

While_Control 

Conditional_Control 

Procedure: 

Parameters: 

INCR_CTLcreate 

Expression  control  - controlling  expression 

Expression  start  - initial  value 

Expression  end  - terminal  value 

Expression  increment  - amount  by  which  to  increment 

Error*  errc  - buffer  for  error  code 

Returns: 

Errors: 

Increment_Control  - the  loop  control  created 
“ none  -- 

NIST  Express  Working  Form  Programmer’s  Reference 


Page  24 


Stephen  Nowland  Clark 


Procedure: 

Parameters: 

Returns: 

Requires: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Requires: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


UNTD-create 

Expression  control  - termination  condition 
Error*  errc  - buffer  for  error  code 
Until  - the  loop  control  created 

OBJis_kind„of(EXPget_type(control),  Class_Logical_Type) 
ERROR__control_boolean__expected  - controlling  expression  is  not  logical 

WHILEcreate 

Expression  control  - continuation  condition 
Error*  errc  - buffer  for  error  code 
While  - the  loop  control  created 

OBJis_kind_of(EXPget_type(control),  Class_Logical_Type) 
ERROR_control_boolean_expected  - controlling  expression  is  not  logical 

LOOP_CTLge  t_c  on  tro  llin  g_expres  sion 
Loop_Control  control  - loop  control  to  examine 
Expression  - controlling  expression 

Retrieve  a loop  control’s  controlling  expression.  For  while  and  undl  controls,  this  is 
the  termination  or  continuation  condition,  respectively.  For  iteration  and  set  scan 
controls,  this  is  the  expression  which  receives  successive  values  in  the  iteration. 

INCR_CTLget_fmal 

Increment_Control  control  - increment  control  to  examine 
Expression  - terminal  value  for  controlling  expression 
Retrieve  the  final  value  from  an  increment  control. 

INCR_CTLget_increment 

Increment_Control  control  - increment  control  to  examine 
Expression  - amount  to  increment  by  on  each  iteration 
Retrieve  the  increment  expression  from  an  increment  control. 

INCR_CTLget_start 

Increment_Control  control  - increment  control  to  examine 
Expression  - inidal  expression  for  controlling  expression 
Retrieve  the  inidal  value  from  an  increment  control. 

LOOP_CTLinitialize 
none  =- 
void 

Initialize  the  Loop  Control  module.  This  is  called  by  EXPRESSinitiaiize  ()  ,and 
so  normally  need  not  be  called  individually. 

LOOP_CTLresolve 

Loop_Control  control  - control  to  resolve 
Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a loop  control.  This  is  called,  in  due  course,  by 
EXPRESSpass_2  () . 
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5e9  Schema 

Type: 

Supertype: 

Schema 

Scope 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAcreate 

String  name  - name  of  schema  to  create 

Scope  scope  - local  scope  for  schema 

Error*  errc  - buffer  for  error  code 

Schema  - the  schema  created 

Create  a new  schema. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAdump 

Schema  schema  - schema  to  dump 

FILE*  file  - file  to  dump  to 
void 

Dump  a schema  to  a file.  This  function  is  provided  for  debugging  purposes. 

Procedure: 

Parameters: 

Returns: 

SCHEMAget_.name 

Schema  schema  - schema  to  examine 

String  - the  schema’s  name 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAinitialize 

- none  - 

void 

Initialize  the  Schema  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCHEMAresolve 

Schema  schema  - schema  to  resolve 
void 

Resolve  all  symbol  references  within  a schema.  In  order  to  avoid  problems  due  to 
references  to  as-yet-unresolved  symbols,  schema  resolution  is  broken  into  two  passes, 
which  are  implemented  by  SCHEMAresolve_passl  ( ) and 
SCHEMAresolve_pass2  ( ) . These  two  are  called  in  turn  by 

SCHEMAresolve  0 . 

5.10  Scope 

Type: 

Supertype: 

Scope 

Symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEadd_import 

Scope  scope  - scope  to  modify 

Symbol  schema  - schema  to  import  (assume) 
void 

Add  a schema  to  the  import  list  of  a scope.  If  the  symbol  given  has  not  been  resolved 
to  a schema,  SCOPE  resolve  ( ) will  see  to  it  that  it  is. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 


Returns: 

Description: 

Errors: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


SCOPE  add_pri  vate 

Scope  scope  - scope  to  modify 

Symbol  name  - item  to  add  to  private  list 

void 

Add  an  item  to  a scope’s  list  of  private  declarations. 

S C OPEadd_supersc  ope 
Scope  scope  - scope  to  modify 
Scope  parent  - additional  parent  scope 
void 

Add  an  immediate  parent  to  a scope. 

SCOPEcreate 

Scope  scope  - next  higher  scope 
Scope  - the  scope  created 

Create  an  empty  scope.  Note  that  the  connection  between  this  new  scope  and  its  parent 
(the  sole  p^ameter  to  this  call)  is  uni-directional;  the  parent  does  not  immediately 
know  about  the  child. 

SCOPEdefme_symbol 

Scope  scope  - scope  in  which  to  define  symbol 
Symbol  symdef  - new  symbol  defmition 
Error*  errc  - buffer  for  error  code 
void 

Define  a symbol  in  a scope. 

Reports  all  errors  directly,  so  only  ERROR_subordinate_f  ailed  is  propagated. 
SCOPEdump 

Scope  scope  - scope  to  dump 
FILE*  file  - file  stream  to  dump  to 
void 

Dump  a schema  to  a file.  This  function  is  provided  for  debugging  purposes. 

SCOPEget_algorithms 

Scope  scope  - scope  to  examine 

Linked_List  • list  of  locally  defined  algorithms 

Retrieve  a list  of  the  algorithms  defmed  locally  in  a scope.  The  elements  of  this  list  are 
Algorithms.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEget_constants 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  constants 

Retrieve  a list  of  the  constants  defined  locally  in  a scope.  The  elements  of  this  list  are 
Constants.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEget_entides 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  entities 

Retrieve  a list  of  the  entities  defined  locally  in  a scope.  The  elements  of  this  list  are 
Entitys.  The  list  should  be  LISTf  ree’d  when  no  longer  needed.  This  function  is 
considerably  faster  than  SCOPEget  entities_superclass_order  ( ) , and 
should  be  used  whenever  the  order  oF the  entities  on  the  list  is  not  important. 
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Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


SCOPEget„entities_superclass„order 
Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  entides  in  superclass  order 
Retrieve  a list  of  the  entities  defined  locally  in  a scope.  The  elements  of  this  list  are 
Entitys.  The  list  should  be  LISTf  ree’d  when  no  longer  needed.  The  list  returned 
is  ordered  such  that  each  entity  appears  before  all  of  its  subtypes. 

SCOPEgetJmports 

Scope  scope  - scope  to  examine 

Linked„List  - ’assumed’  schemata 

Retrieve  a list  of  the  schemata  assumed  in  a scope.  The  elements  of  this  list  are 
S chemas.  The  list  should  not  be  L I S T f r ee ’d. 

SCOPEget_resolved 

Scope  scope  - scope  to  examine 

Boolean  - has  this  scope  been  resolved? 

Check  whether  symbol  references  in  a scope  have  been  resolved. 

SCOPEget_schemata 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  schemata 

Remeve  a list  of  the  schemata  defined  locally  in  a scope.  The  elements  of  this  list  are 
Schemas.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEget„superscopes 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  next  outer  (containing)  scopes 

Retrieve  a list  of  a scope’s  parent  scope. 

SCOPEget_types 

Scope  scope  - scope  to  examine 

Linked„List  - list  of  locally  defined  types 

Redieve  a list  of  the  types  defined  locally  in  a scope.  The  elements  of  this  list  are 
Types.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEget_variables 

Scope  scope  - scope  to  examine 

Linked_List  - list  of  locally  defined  variables 

Remeve  a list  of  the  variables  defined  locally  in  a scope.  The  elements  of  this  list  are 
Variables.  The  list  should  be  LISTf  ree’d  when  no  longer  needed. 

SCOPEinitialize 
— none  -- 
void 

Initialize  the  Scope  module.  This  is  called  by  EXPRESS  initialize  ( ) , and  so 
normally  need  not  be  called  individually. 
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Procedure: 

SCOPElookup 

Parameters: 

Scope  scope  - scope  in  which  to  look  up  name 

String  name  - name  to  look  up 

Boolean  walk  - look  in  parent  and  imported  scopes? 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Symbol  - definition  of  name  in  scope 

Retrieve  a name’s  definition  in  a scope.  If  the  scope  does  not  define  the  name,  the 
parent  scopes  are  successively  queried.  If  no  definidon  is  found,  SYMBOL  NULL  is 
returned. 

Errors: 

ERROR_undef  ined_identif  ier  - no  definidon  was  found 

Procedure: 

Parameters: 

SCOPEput_im  ports 

Scope  scope  - scope  to  modify 

Linked_List  imports  - list  of  schemata  to  assume 

Returns; 

Description: 

void 

Set  the  entire  list  of  assumed  schemata  in  one  fell  swoop. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEput_resolved 

Scope  scope  - scope  to  modify 
void 

Set  the  ’resolved’  flag  for  a scope.  This  normally  should  only  be  called  by 
SCOPEresolve  ( ) , which  actually  resolves  the  scope. 

Procedure: 

Parameters: 

Returns: 

Description: 

SCOPEresolve 

Scope  scope  - scope  to  resolve 
void 

Resolve  all  symbol  references  in  a scope.  In  order  to  avoid  problems  due  to  references 
to  as-yet-unresolved  symbols,  scope  resolution  is  broken  into  two  passes,  which  are 
implemented  by  SCOPEresolve_passl  ( ) and  SCOPEresolve_pa3s2  ( ) . 
These  two  are  called  in  turn  by  SCOPEresolve  ( ) . 

5.11  Statement 


Private  Type: 

Statement 

Supertype: 

Construct 

Type: 

Supertype: 

Assignment 

Statement 

Type: 

Supertype: 

Compound_S  tatement 

Statement 

Type: 

Supertype: 

Condidonal 

Statement 

Type: 

Supertype: 

Loop 

Statement 

Type: 

Supertype: 

Procedure_Call 

Statement 
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Type: 

Supertype: 

Retum_Statement 

Statement 

Type: 

Supertype: 

With_Statement 

Statement 

Procedure: 

Parameters: 

ASSIGNcreate 

Expression  Ihs  - the  left- hand- side  of  the  assignment 

Expression  rhs  - the  right-hand-side  of  the  assignment 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Assignment  - the  assignment  statement  created 

Create  an  assignment  statement. 

Procedure: 

Parameters: 

Returns: 

ASSIGNget_lhs 

Assignment  statement  - statement  to  examine 

Expression  - left-hand-side  of  assignment  statement 

Procedure: 

Parameters: 

Returns: 

ASSIGNget_rhs 

Assignment  statement  - statement  to  examine 

Expression  - right-hand-side  of  assignment  statement 

Procedure: 

Parameters: 

CASEcreate 

Expression  selector  - expression  to  case  on 

Linked_List  case  - list  of  case  branches 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Case_Statement  - the  case  statement  created 

Create  a case  statement  The  elements  of  the  case  branch  list  should  be  Case_i  terns. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEgetJtems 

Case_Statement  statement  - statement  to  examine 

Linked_List  - case  branches 

Retrieve  a list  of  the  branches  in  a case  statement  The  elements  of  this  list  are 
Case_Items. 

Procedure: 

Parameters: 

Returns: 

Description: 

CASEget_selector 

Case_Statement  statement  - statement  to  examine 

Expression  - the  selector  for  the  case  statment 

Retrieve  the  selector  from  a case  statement.  This  is  the  expression  whose  value  is 
compared  to  each  case  label  in  turn. 

Procedure: 

Parameters: 

COMP_STMTcreate 

Linked_List  statements  - list  of  compound  statement  elements 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Compound_Statement  - the  compound  statement  created 

Create  a compound  statement.  The  elements  of  the  statements  list  should  be 
Statements,  in  the  order  they  appear  in  the  compound  statement  to  be  represented. 

Procedure: 

Parameters: 

Returns: 

Description: 

COMP_STMTget_items 

Compound_Statement  statement  - statement  to  examine 

Linked_List  - list  of  statements  in  compound 

Retrieve  a list  of  the  Statements  comprising  a compound  statement. 

NIST  Express  Working  Form  Programmer’s  Reference 


Page  30 


Stephen  Nowland  Clark 


Procedure: 

Parameters: 

CONDcreate 

Expression  test  - the  condition  for  the  if  ' 

Statement  then  - code  executed  when  test  ==  true 

Statement  otherwise  - code  executed  when  test  ==  false 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Condidonal  - the  if  statement  created 

Create  an  if  statement.  For  a simple  if  . . then  . . with  no  else  clause,  set  the 
third  parameter  to  STATEMENT_NULL. 

Procedure: 

Parameters: 

Returns: 

CONDget_else_clause 

Conditional  statement  - statement  to  examine 

Statement  - code  for  ’else’  branch 

Procedure: 

Parameters: 

Returns: 

CONDget_condition 

Conditional  statement  - statement  to  examine 

Expression  - the  test  condition 

Procedure: 

Parameters: 

Returns: 

CONDget_then_clause 

Condidonal  statement  - statement  to  examine 

Statement  - code  for  ’then’  branch 

Procedure: 

Parameters: 

LOOPcreate 

Linked_List  controls  - list  of  controls  for  the  loop 

Statement  body  - statement  to  be  repeated 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Loop  - the  loop  statement  created 

Create  a loop  statement.  The  elements  of  the  controls  list  should  be 
Loop_Controls. 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOPget_body 

Loop  statement  - statement  to  examine 

Statement  - the  body  of  the  loop 

Retrieve  the  body  (repeated  pordon)  of  a loop  statement 

Procedure: 

Parameters: 

Returns: 

Description: 

LOOPget_controls 

Loop  statement  - statement  to  examine 

Linked_List  - list  of  loop  controls 

Retrieve  a list  of  a loop  statement’s  controls.  The  elements  of  this  list  are 
Loop_ControlS. 

Procedure: 

Parameters: 

PCALLcreate 

Procedure  procedure  - procedure  called  by  statement 

Linked_List  parameters  - list  of  actual  parameters 

Error*  errc  - buffer  for  error  code 

Returns: 

Description: 

Procedure_Call  - the  procedure  call  created 

Create  a procedure  call  statement.  The  elements  of  the  actual  parameter  list  should  be 
Expressions  which  compute  the  values  to  be  passed  to  the  procedure. 
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Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 


Returns: 

Description: 


PCALLget_procediire 

Procedure_Call  statement  - statement  to  examine 

Procedure  - procedure  called  by  this  statement 

Retrieve  the  procedure  called  by  a procedure  call  statement. 

PCALLget_parameters 

Procedure_Call  statement  - statement  to  examine 
Linked_List  - actual  parameters  to  this  call 

Retrieve  the  actual  parameters  for  a procedure  call  statement.  The  elements  of  this  list 
are  Expressions  which  compute  the  values  to  be  passed  to  the  called  roudne. 

PCALLput_procedure 

Procedure_Call  statement  - statement  to  modify 
Procedure  procedure  - defmidon  of  called  procedure 
void 

Set  the  actual  procedure  called  by  a procedure  call  statement.  If  a procedure  stub 
(unresolved  Symbol)  is  present  in  the  statement,  it  is  replaced  such  that  all  references 
remain  valid. 

RETcreate 

Expression  expression  - expression  to  compute  return  value 
Error*  errc  - buffer  for  error  code 
Retum_Statement  - the  return  statement  created 
Create  a return  statement. 

RET  get_expression 

Retum_Statement  statement  - statement  to  examine 
Expression  - expression  returned  by  this  statement 

Retrieve  the  expression  whose  value  is  computed  and  returned  by  a return  statement. 

STMTinitialize 
--  none  -- 
void 

Iniualize  the  Statement  module.  This  is  called  by  EXPRESS  initialize  ( ) ,and  so 
normally  need  not  be  called  individually. 

STMTresolve 

Statement  statement  - statement  to  resolve 
Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a statement.  This  is  called,  in  due  course,  by 
EXPRESSpass_2  () . 

WITHcreate 

Expression  expression  - controlling  expression  for  the  with 
Statement  body  - controlled  statement  for  the  with 
Error*  errc  - buffer  for  error  code 
With_Statement  - the  with  statement  created 
Create  a with  statement. 
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Procedure: 

WITHget_body 

Parameters: 

Returns: 

With_Statement  statement  - statement  to  examine 

Statement  - statement  forming  the  body  of  the  with  statement 

Procedure: 

Parameters: 

Returns: 

Description: 

WITHget_controi 

With_Statement  statement  - statement  to  examine 

Expression  - the  controlling  expression 

Retrieve  the  controlling  expression  from  a with  statement.  This  is  the  expression 
which  will  be  prepended  to  any  expression  which  cannot  otherwdse  be  evaluated  in  the 
current  scope. 

5.12  Symbol 

Type: 

Supertype: 

Symbol 
="  none  - 

Procedure: 

Parameters: 

Returns: 

SYMBOLget_line_number 

Symbol  symbol  - symbol  to  examine 
int  - line  number  of  symbol 

Procedure: 

Parameters: 

Returns: 

SYMBOLget_name 

Symbol  symbol  - symbol  to  examine 

String  - name  of  symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

S YMB  OLge  t_resolved 

Symbol  symbol  - symbol  to  examine 

Boolean  - is  the  symbol  resolved? 

Test  whether  a symbol  has  been  resolved. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLinidalize 

— none  -- 

void 

Initialize  the  Symbol  module.  This  is  called  by  EXPRESSinitialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLput_line_number 

Symbol  symbol  - symbol  to  modify 
int  number  - line  number  for  symbol 
void 

Set  a symbol’s  Line  number. 

Procedure: 

Parameters: 

Returns: 

Description: 

SYMBOLput_name 

Symbol  symbol  - symbol  to  name 

String  name  - name  of  symbol 
void 

Set  the  name  of  a symbol. 
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Procedure: 

SYMBOLput_resolved 

Parameters: 

Returns: 

Description: 

Symbol  symbol  - symbol  to  mark  resolved 
void 

Mark  a symbol  as  being  resolved.  This  is  normally  called  by  the  client 
xxxput_resolved  ( ) functions,  since  a symbol  cannot  itself  be  resolved. 

5.13  Type 

Private  Type: 
Supertype: 

Type 

Symbol 

Type: 

Supertype: 

Aggregate_Type 

Type 

Type: 

Supertype: 

Array  „Type 

Aggregate„Type 

Type: 

Supertype: 

Bag„Type 

Aggregate„Type 

Type: 

Supertype: 

List„Type 

Aggregate_Type 

Type: 

Supertype: 

Set_Type 

Aggregate_Type 

Private  Type: 
Supertype: 

Composed_Type 

Type 

Type: 

Supertype: 

Entity  _Type 

Composed_Type 

Type: 

Supertype: 

Enumeration_T  ype 

Composed_Type 

Type: 

Supertype: 

Select_Type 

Composed_Type 

Type: 

Supertype: 

Generic_Type 

Type 

Type: 

Supertype: 

Logical_Type 

Type 

Type: 

Supertype: 

Boolean_Type 

Logical_Type 

Type: 

Supertype: 

Number_Type 

Type 
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Private  Type: 
Supertype: 

Sized_Type 

Type 

Type: 

Supertype: 

Integer_T>T3e 

Sized_Type 

Type: 

Supertype: 

Real_Type 

Sized_Type 

Type: 

Supertype: 

String_Type 

Sized_Type 

Type: 

Supertype: 

Type_Reference 

Type 

Constant: 

Description: 

TYPE_AGGREGATE 

Type  for  general  aggregate  of  generic. 

Constant: 

Description: 

TYPE.BOOLEAN 

Boolean  type. 

Constant: 

Description: 

TYPE_GENERIC 

The  type  ’generic.’ 

Constant: 

Description: 

TYPE_INTEGER 

Integer  type  with  default  precision. 

Constant: 

Description: 

TYPE_LOGICAL 

Logical  type. 

Constant: 

Description: 

TYPE_META 

Meta  type  (for  TYPEOF  expressions). 

Constant: 

Description: 

TYPE.NUMBER 

Number  type. 

Constant: 

Description: 

TYPE_REAL 

Real  type  with  default  precision. 

Constant: 

Description: 

TYPE_SET_OF_GENERIC 

Type  for  unconstrained  set  of  generic. 

Constant: 

Description: 

TYPE_STRING 

String  type  with  default  precision  (length). 
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Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


AGGR_TYPEget_optional 
Aggregate_Type  type  - type  to  examine 
Boolean  - are  elements  of  this  aggregate  optional? 

Retrieve  the  ’optional’  flag  from  an  aggregate  type.  This  flag  is  true  if  and  only  if  a 
legal  instantiation  of  the  type  need  not  have  all  of  its  slots  filled. 

AGGR_TYPEget_unique 

Aggregate_,Type  type  - type  to  examine 

Boolean  -■  must  elements  of  this  aggregate  be  unique? 

Retrieve  the  ’unique’  flag  from  an  aggregate  type.  This  flag  is  true  if  and  only  if  a legal 
instantiation  of  the  type  may  not  contain  duplicates. 

AGGR_TYPEget_base_type 
Aggregate_Type  type  - type  to  examine 
Type  - the  base  type  of  the  aggregate  type 

Retrieve  the  base  type  of  an  aggregate.  This  is  the  type  of  each  element  of  an 
instantiation  of  the  type. 

AGGR_TYPEget_lowerJimit 
Aggregate„Type  type  - type  to  examine 
Expression  = lower  limit  of  the  aggregate  type 

Retrieve  an  aggregate  type’s  lower  bound.  For  an  array  type,  this  is  the  lowest  index; 
for  other  aggregate  types,  it  specifies  the  minimum  number  of  elements  which  the 
aggregate  must  contain. 

AGGR_TYPEget_upper_limit 
Aggregate„Type  type  = type  to  examine 
Expression  - upper  limit  of  the  aggregate  type 

Retrieve  an  aggregate  type’s  upper  bound.  For  an  array  type,  this  is  the  high  index;  for 
other  aggregate  types,  it  specifies  the  maximum  number  of  elements  which  the 
aggregate  may  contain. 

AGGR_TYPEput_optional 
Aggregate_,Type  type  - type  to  modify 
Boolean  optional  - are  array  elements  optional? 
void 

Set  the  ’optional’  flag  for  an  array  type.  This  flag  indicates  that  all  slots  in  an  instance 
of  the  type  need  not  be  filled. 

AGGR_TYPEput_unique 

-^ggregate^Type  type  - type  to  modify 

Boolean  unique  - are  aggregate  elements  required  to  be  unique? 

void 

Set  the  ’unique’  flag  for  an  aggregate  type.  This  flag  indicates  that  an  instantiation  of 
the  type  may  not  contain  duplicate  items. 

AGGR_TYPEput„base_type 
Aggregate_Type  type  - type  to  modify 
Type  base  - the  base  type  for  this  aggregate 
void 

Set  the  base  type  of  an  aggregate  type.  This  is  the  type  of  every  element. 
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Procedure: 

Parameters: 


Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 

Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


AGGR_TYPEput_limits 
Aggregate_Type  type  - type  to  modify 
Expression  lower  - lower  bound  for  aggregate 
Expression  upper  - upper  bound  for  aggregate 
void 

Set  the  lower  and  upper  bounds  for  an  aggregate  type.  For  an  array  type,  these  are  the 
low  and  high  indices;  for  other  aggregates,  the  specify  the  minimum  and  maximum 
number  of  elements  which  an  instance  may  contain. 

ENT_TYPEget_entity 

Entity_Type  type  - type  to  examine 

Entity  - defmidon  of  entity  type 

Retrieve  the  (first)  endty  referenced  by  an  endty  type. 

ENT_TYPEget_entity_list 

Entity_Type  type  - type  to  examine 

Linked_List  - definidon  of  entity  type 

Retrieve  a list  of  the  enddes  referenced  by  an  entity  type. 

ENT_TYPEput_entity 
Entity _Type  type  - type  to  modify 
Entity  endty  - definidon  of  type 
void 

Set  the  entity  referred  to  by  an  endty  type, 

ENT_TYPEput_entity_list 
Entity_Type  type  - type  to  modify 
Linked_List  - definidon  of  type 
void 

Set  the  list  of  endties  referred  to  by  an  endty  type. 

ENUM_T  YPE  ge  t_i  tern  s 
Enumeration_Type  type  - type  to  examine 
Linked_List  - list  of  enumeration  items 

Retrieve  an  enumerated  type’s  list  of  idendfiers.  Each  element  of  this  list  is  a 
Constant. 

ENUM_T  YPEput_item  s 
Enumeradon_Type  type  - type  to  modify 
Linked_List  list  - list  of  enumeradon  items 
void 

Set  the  list  of  idendfiers  for  an  enumerated  type.  Each  element  of  this  list  should  be  a 
Constant. 

SEL_TYPEget_items 

Select_Type  type  - type  to  examine 

Linked_List  - list  of  selectable  types 

Retrieve  a list  of  the  selectable  types  from  a select  type. 
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Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 

Description: 


Procedure: 

Parameters: 

Returns: 


SEL_TYPEput_items 
Select_Type  type  - type  to  modify 
Linked_List  list  - list  of  selectable  t>'pes 
void 

Set  the  list  of  selections  for  a select  type.  An  instance  of  any  these  types  is  a legal 
instantiation  of  the  select  type.  Each  Type  on  the  list  should  be  of  class 
TYPE_ENTITY  or  TYPE_SELECT. 

SZD_TYPEgetj>recision 

Sized_Type  type  - type  to  examine 

Expression  - the  precision  specification  of  the  type 

Retrieve  the  precision  specification  from  certain  types.  This  specifies  the  maximum 
number  of  significant  digits  or  characters  in  an  instance  of  the  type. 

SZD_TYPEget_varying 

Sized_Type  type  = type  to  examine 

Boolean  - is  the  string  type  of  varying  length? 

Retrieve  the  ’varying’  flag  from  a string  type.  This  flag  is  true  if  and  only  if  the  length 
of  an  instance  may  vary,  up  to  the  type’s  precision.  It  is  true  by  default. 

SZD_TYPEput_precision 
Sized_Type  type » type  to  modify 
Expression  prec  - the  precision  of  the  type 
void 

Set  the  precision  of  certain  types.  This  is  the  maximum  number  of  significant  digits  or 
characters  in  an  instance. 

SZD_TYPEput_varying 

Sized_Type  type  - type  to  modify 

Boolean  varying  - is  string  type  of  varying  length? 

void 

Set  the  ’varying’  flag  of  a string  type.  This  flag  indicates  that  the  length  of  an  instance 
may  vary,  up  to  the  type’s  precision.  The  default  behavior  for  a string  type  is  to  be 
varying,  i.e.,  strings  are  inidalized  as  if  TYPEput_varying(string,  true)  were  called. 

TYPEcompadble 

Type  lhs_type  - type  for  left-hand-side  of  assignment 
Type  rhs_type  - type  for  right-hand-side  of  assignment 
Boolean  - are  the  types  assignment  compadble? 

Determine  whether  two  types  are  assignment-compadble.  It  must  be  possible  to  assign 
a value  of  rhs_type  into  a slot  of  lhs_type. 

TYPEget_name 

Type  type  - type  to  examine 

String  - the  name  of  the  type 
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Procedure: 

Parameters: 

Returns: 

Description: 

TYPEget_size 

Type  type  - type  to  examine 
int  - logical  size  of  a type  instance 

Compute  the  size  of  an  instance  of  some  type.  Simple  types  all  have  size  1,  as  does  a 
select  type.  The  size  of  an  aggregate  type  is  the  maximum  number  of  elements  an 
instance  can  contain;  and  the  size  of  an  entity  type  is  its  total  attribute  count.  If  an 
aggregate  type  is  unbounded,  the  constant  type  unbounded  S IZE  is  returned. 
T^is  value  may  be  ambiguous;  the  upper  bound  of  the  type  should  be  relied  on  to 
determined  unboundedness.  It  is  intended  that  the  initial  memory  allocadon  for  such 
an  aggregate  should  give  space  for  type_unbounded^S  i ze  elements,  and  that  this 
should  grow  as  needed.  By  returning  some  reasonable  Initial  size,  this  call  allows  its 
return  value  to  be  used  immediately  as  a parameter  to  a memory  allocator,  without 
being  checked  for  validity.  This  is  the  approach  taken  in  the  STEP  Working  Form 
[ClarkPOd],  [Clark90e]. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEget_where_clause 

Type  type  - type  to  examine 

Linked_List  - the  type’s  WHERE  clause 

Retrieve  the  WHERE  clause  associated  with  a type.  Each  element  of  the  returned  list 
will  be  an  Expression  which  computes  a Logical  result. 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPEinitialize 

- none  ™ 

void 

Initialize  the  Type  module.  This  is  called  by  EXPRESS  initialize  ( ) , and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

TYPEput_name 

Type  type  - type  to  modify 

String  name  - new  name  for  type 

Returns: 

Description: 

void 

Set  the  name  of  a type. 

Procedure: 

Parameters: 

TYPEput_where_clause 

Type  type  - type  to  modify 

Linked_List  - the  type’s  WHERE  clause 

Returns: 

Description: 

void 

Set  the  WHERE  clause  associated  with  a type.  Each  element  of  the  list  should  be  an 
Expression  which  computes  a Logical  result. 

Procedure: 

Parameters: 

TYPEresolve 

Type  type  ■=  type  to  resolve 

Scope  scope  - scope  in  which  to  resolve 

Returns: 

Description: 

void 

Resolve  all  references  in  a type  definition,  and  transform  a type  reference  into  the 
appropriate  Type  or  Entity  construct.  This  is  called,  in  due  course,  by 
EXPRESSpass_2 ()  . 

Procedure: 

Parameters: 

Returns: 

Description: 

TYPE_REFget_full_name 

Type_Reference  type  - type  reference  to  examine 

Expression  - [qualified]  identifier  expression  for  type  reference 

Retrieve  the  identifier  expression  for  a type  reference.  This  expression  consists  of 
identifier  components  assembled  into  binary  expressions  with  OP_dot. 
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Procedure: 

Parameters: 

Returns: 

Description: 

TYPE_REFput_full_name 

Type_Reference  type  - type  reference  to  modify 

Expression  name  - [qualified]  identifier  expression  for  type  reference 
void 

Set  the  identifier  expression  for  a type  reference. 

5A4  Variable 

Type: 

Supertype: 

Variable 

Symbol 

Procedure: 

Parameters: 

Returns: 

Description: 

VARcreate 

String  name  - name  of  variable  to  create 

Type  type  - type  of  variable  to  create 

Error*  errc  - buffer  for  error  code 

Variable  - the  Variable  created 

Create  a new  variable.  The  reference  class  of  the  variable  is,  by  default, 
REF_DYNAMIC.  Ail  special  flags  associated  with  the  variable  (e.g.,  optional)  are 
initially  false. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_derived 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  derived  flag 

Retrieve  the  value  of  a variable’s  ’derived’  flag.  This  flag  indicates  that  an  entity 
attribute’s  value  should  always  be  computed  by  its  initializer;  no  value  will  ever  be 
specified  for  it. 

Procedure: 

Parameters: 

Returns: 

Description: 

V ARget_initializer 

Variable  var  - variable  to  modify 

Expression  - variable  initializer 

Retrieve  the  expression  used  to  initialize  a variable. 

Procedure: 

Parameters: 

Returns: 

VARget_name 

Variable  var  = variable  to  examine 

String  - the  name  of  the  variable 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_offset 

Variable  var  - variable  to  examine 
int  • offset  to  variable  in  local  frame 

Retrieve  the  offset  to  a variable  in  its  local  frame.  This  offset  alone  is  not  sufficient  in 
the  case  of  an  entity  attribute  (see  ENT  IT  Yget  attribute  offset  0). 

Procedure: 

Parameters: 

Returns: 

Description: 

VARget_optional 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  optional  flag 

Retrieve  the  value  of  a variable’s  ’optional’  flag.  This  flag  indicates  that  a particular 
entity  attribute  need  not  have  a value  when  the  entity  is  instantiated. 

Procedure: 

Parameters: 

Returns: 

V ARget_reference_class 

Variable  var  - variable  to  examine 

Reference_Class  - the  variable’s  reference  class 
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Procedure: 

Parameters: 

Returns: 

VARget_type 

Variable  var  - variable  to  examine 

Type  - the  type  of  the  variable 

Procedure: 

Parameters: 

Returns: 

Description: 

V ARget_variable 

Variable  var  - variable  to  examine 

Boolean  - value  of  variable’s  variable  flag 

Retrieve  the  value  of  a variable’s  ’variable’  flag.  This  flag  indicates  that  an  algorithm 
parameter  is  to  be  passed  by  reference,  so  that  it  can  be  modified  by  the  callee. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARinitialize 

- none  -- 

void 

Initialize  the  Variable  module.  This  is  called  byEXPRZSSinitializeO,  and  so 
normally  need  not  be  called  individually. 

Procedure: 

Parameters: 

VARput_derived 

Variable  var  - variable  to  modify 

Boolean  val  - new  value  for  derived  flag 

Returns: 

Description: 

void 

Set  the  value  of  the  ’derived’  flag  for  a variable.  This  flag  is  currently  redundant,  as  a 
derived  attribute  can  be  identified  by  the  fact  that  it  has  an  initializing  expression.  This 
may  not  always  be  true,  however. 

Procedure: 

Parameters: 

V ARput_initializer 

Variable  var  - variable  to  modify 

Expression  init  - initializer 

Returns: 

Description: 

void 

Set  the  initializing  expression  for  a variable. 

Procedure: 

Parameters: 

VARput_offset 

Variable  var  - variable  to  modify 

int  offset  - offset  to  variable  in  local  frame 

Returns: 

Description: 

void 

Set  a variable’s  offset  in  its  local  frame.  Note  that  in  the  case  of  an  entity  attribute,  this 
offset  is  from  the  first  locally  defined  attribute,  and  must  be  used  in  conjunction  with 
entity’s  initial  offset  (see  ENTITYget_att:ribute_of  f set  ( ) ). 

Procedure: 

Parameters: 

VARput_optional 

Variable  var  - variable  to  modify 

Boolean  val  - value  for  optional  flag 

Returns: 

Description: 

void 

Set  the  value  of  the  ’optional’  flag  for  a variable.  This  flag  indicates  that  a particular 
entity  attribute  need  not  have  a value  when  the  entity  is  instantiated.  It  is  initially  false. 

Procedure: 

Parameters: 

VARput_reference_class 

Variable  var  - variable  to  modify 

Reference_Class  ref  - the  variable’s  reference  class 

Returns: 

Description: 

void 

Set  the  reference  class  of  a variable.  The  reference  class  defaults  to  ref_dynamic. 
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Procedure: 

VARput_variable 

Parameters: 

Returns: 

Description: 

Variable  var  - variable  to  modify 

Boolean  val  - new  value  for  variable  flag 
void 

Set  the  value  of  the  ’variable’  flag  for  a variable.  This  flag  indicates  that  an  algorithm 
parameter  is  to  be  passed  by  reference,  so  that  it  can  be  modified  by  the  callee. 

Procedure: 

Parameters: 

Returns: 

Description: 

VARresolve 

Variable  variable  - variable  to  resolve 

Scope  scope  - scope  in  which  to  resolve 
void 

Resolve  all  symbol  references  in  a variable  definition.  This  is  called,  in  due  course,  by 
EXPRESSpass_2  () . 

6 Express  Working  Form  Error  Codes 

The  Error  module,  which  is  used  to  manipulate  these  error  codes,  is  described  in 
[Clark90c]. 


Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_baiLout 

Express 

SEVERITY_DUMP 

Fed-X  internal  error 

none  ~ 

Error: 
Defined  In: 
Severity: 
Meaning: 

Format: 

ERROR_control_boolean_expected 

Loop_Control 

SEVERITY.WARNING 

The  controlling  expression  for  a while  or  until  does  not  seem  to  return  boolean.  In  the 
current  implementation,  this  message  can  be  erroneously  produced  because  proper 
types  are  not  derived  for  complex  expressions;  thus,  an  expression  which  truly  does 
compute  a boolean  result  may  not  appear  to  do  so  according  to  the  Working  Form. 

="  none  - 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_comipted_expression 

Expression 

SEVERITY„DUMP 

Fed-X  internal  error:  an  Expression  structure  was  corrupted 
%s  - function  detecting  error 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_corrupted„statement 

Statement 

SEVERITY.DUMP 

Fed-X  internal  error  a Statement  structure  was  corrupted 
%s  - function  detecting  error 
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Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_corrupted_type 

Type 

SEVERITY_DUMP 

Fed-X  internal  error  a Type  structure  was  corrupted 
%s  - function  detecting  error 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_duplicate_declaration 

Scope 

SEVERITY_ERROR 

A symbol  was  redeclared  in  the  same  scope 

%s  - name  of  redeclared  symbol 

%d  - line  number  of  previous  declaration 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_inappropriate_use 

Scope 

SEVERITY_ERROR 

A symbol  was  used  in  a context  which  is  inappropriate  for  its  declaradon. 

%s  - the  name  of  the  symbol 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_include_file 

Scanner 

SEVERITY_ERROR 

An  iNCLUDEd  file  could  not  be  opened. 

%s  - the  name  of  the  file 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_integer_expression_expected 

Expression 

SEVERITY_WARNING 

A non-integer  expression  was  encountered  in  an  integer-only  context 
“ none  -- 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_integer_literal_expected 

Expression 

SEVERITY_WARNING 

A non-integer  or  non-literal  was  encountered  in  an  integer-literal  context 
— none  -- 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_logical_l  iteral_expected 

Expression 

SEVERITY_WARNING 

A non-logical  or  non-literal  was  encountered  in  a logical-literal  context 
- none  - 

Error: 

Defined  In: 
Severity: 
Meaning: 
Format: 

ERROR_missing_subtype 

Pass2 

SEVERITY_W  ARMING 

An  entity  which  lists  a particular  supertype  does  not  appear  in  that  entity’s  subtype  list. 
%s  - the  name  of  the  subtype 
%s  - the  name  of  the  supertype 
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Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

Error: 
Defined  In: 
Severity; 
Meaning: 
Format: 


Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

Error; 
Defined  In: 
Severity: 
Meaning: 
Format; 

Error: 
Defined  In: 
Severity: 
Meaning; 
Format: 

Error: 
Defined  In: 
Severity; 
Meaning: 
Format: 


Error; 
Defined  In: 
Severity: 
Meaning: 
Format: 


ERROR_missing_supertype 

Pass2 

SEVERITY_ERROR 

An  entity  which  lists  a particular  subtype  does  not  appear  in  that  entity’s  supertype  list. 
%s  - the  name  of  the  supertype 
%s  - the  name  of  the  subtype 

ERROR„nested_c  om  men  t 
Scanner 

SEVERITY_WARNING 

A start  comment  symbol  ( * was  encountered  within  a comment. 

“ none  -- 

ERROR_overloaded_attribute 

Pass2 

SEVERITY_ERROR 

An  attribute  name  was  previously  declared  in  a supertype 
%s  - the  attribute  name 

%s  - the  name  of  the  supertype  with  the  previous  declaration 

ERROR_real_literal_expected 

Expression 

SEVERITY.WARNING 

A non-real  or  non-literal  was  encountered  in  a real-literal  context 

- none  -- 

ERROR„set_literal_expected 

Expression 

SEVERITY_WARNING 

A non-set  or  non-literal  was  encountered  in  a set-literal  context 

- none  -- 

ERROR_set_scan_set_expected 

Loop_Control 

SEVERITY.WARNING 

The  control  set  for  a set  scan  control  is  not  a set 

- none  - 

ERROR_shadowed_declaration 

Pass2 

SEVERITY_WARNING 

A symbol  declaration  shadows  a definition  in  an  outer  (or  assumed)  scope. 

%s  - name  of  redeclared  symbol 

%d  - line  number  of  previous  declaration 

ERROR_string_literal_expec  ted 
Expression 

SEVERITY.WARNING 

A non-string  or  non-literal  was  encountered  in  a string- literal  context 

- none  -- 
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Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


Error 
Defined  In: 
Severity: 
Meaning: 

Format: 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 

Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


Error: 
Defined  In: 
Severity: 
Meaning: 

Format: 


ERROR_syntax 

Express 

SEVERITY_EXIT 

Unrecoverable  syntax  error 

%s  - description  of  error 

%s  - name  of  scope  in  which  error  occurred 

ERROR_undefined_identifier 

Pass2 

SEVERITY_WARNING 

An  identifer  was  referenced  which  has  not  been  declared.  This  error  only  produces  a 
warning  because  Fed-X  does  not  deal  with  all  of  the  scoping  issues  in  algorithms. 

%s  - the  name  of  the  identifier 

ERROR_undefined_type 

Pass2 

SEVERITY_ERROR 

An  undeclared  identifier  was  used  in  a context  which  requires  a type, 

%s  - the  name  of  the  type 

ERROR_unknown_expression_class 

Expression 

SEVERITY_DUMP 

Fed-X  internal  error 

%d  - the  offending  expression  class 

%s  - the  context  (function)  in  which  the  error  occurred 

ERROR_unknown_schema 

Pass2 

SEVERITY_WARNING 
An  unknown  schema  was  ASSUMEd 
%s  - the  assumed  schema  name 

ERROR_unknown_subtype 

Pass2 

SEVERITY_WARNING 

An  entity  lists  a subtype  which  is  not  itself  declared  as  an  entity. 

%s  - the  subtype  name 
%s  - the  supertype  name 

ERROR_unknown_supertype 

Pass2 

SEVERITY_EXIT 

An  entity  lists  a supertype  which  is  not  itself  declared  as  an  entity.  Fed-X  is  unable  to 
proceed  in  this  situation. 

%s  - the  supertype  name 
%s  - the  subtype  name 
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Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


Error: 
Defined  In: 
Severity: 
Meaning: 
Format: 


ERROR_unknown_type_class 

Type 

SEVERITY_DUMP 
Fed-X  internal  error 
%d  - the  offending  type  class 

%s  - the  context  (function)  in  which  the  error  occurred 

ERROR_wrong_operand_count 

Expression 

SEVERITY_WARNING 

Mismatch  between  actual  and  expected  (on  the  basis  of  code  context)  operand  count 
%s  - the  operator 


NIST  Express  Working  Form  Programmer’s  Reference 


Page  46 


Stephen  Nowland  Clark 


A References 


[AltemeullerSS] 

Altemeuller,  J..  MaDping  from  Express  to  Physical  File  Structure. 
ISO  TC184/SC4AVG1  Document  N280,  Septembner,  1988 

[ANSI89] 

American  National  Standards  Institute,  Programming  Language  C, 
Document  ANSI  X3. 159-1989 

[Clark90a] 

Clark,  S.  N.,  An  Introduction  to  The  NIST  PDFS  Toolkit,  NISTIR 
4336,  National  Institute  of  Standards  and  Technology,  Gaithersburg, 
MD,  May  1990 

[Clark90b] 

Clark,  S.N.,  Fed-X:  The  NIST  Express  Translator,  NISTIR  4371, 
National  Institute  of  Standards  and  Technology,  Gaithersburg,  MD, 
August  1990 

[Clark90c] 

Clark.  S.N..  The  NIST  PDFS  Toolkit:  Technical  Fundamentals, 
NISTIR  4335,  National  Institute  of  Standards  and  Technology, 
Gaithersburg,  MD,  May  1990 

[Clark90d] 

Clark.  S.N..  The  NIST  Working  Form  for  STEP.  NISTIR  4351. 
National  Institute  of  Standards  and  Technology,  Gaithersburg,  MD, 
June  1990 

[Clark90e] 

Clark,  S.N.,  NIST  STEP  Working  Form  Programmer’s  Reference, 
NISTIR  4353,  National  Institute  of  Standards  and  Technology, 
Gaithersburg,  MD,  June  1990 

[Schenck90] 

Schenck,  D.,  ed..  Exchange  of  Product  Model  Data  - Part  11:  The 
Express  Language,  ISO  TC184/SC4  Document  N64,  July  1990 

[Smith88] 

Smith.  B..  and  G.  Rinaudot,  eds..  Product  Data  Exchange 
Specification  First  Working  Draft,  NISTIR  88-4004,  National 
Institute  of  Standards  and  Technology,  Gaithersburg,  MD, 
December  1988 

NIST  Express  Working  Form  Programmer’s  Reference 


Page  47 


‘V|j 

iiiip  l>n##oK 


■.■•«;  v?'" 


if’ 

f!0i3n919il9H  ,,  k A 


..Ti*-:  .-'^  " 


iMM'U)  Sfcwt* 

iri'a*®a — ■■■'-" — " 

t.33r.  ii>iMK^  ' .1'  n ' ''  ' ;l, 

' ” ' \.I:  ' fQ 

“k8r::^0&'  . 

K' '<1 

dn»t>08)21  !b(K»Jj(4>J  atehoroA 


'(!aM 


m wTi'ci 


immA]  ; 


%$W4 


.jiwimlfi 


IbO^M'jsD?  '■ 

■■  'V 


..m  4bd 


stdOQtePl 


iQH :% 


■-  iSf 


}2£j^’uA' 

laoe^Dl 

tit>  SiifzM  .3ai®®!|fflia3^^  ‘•^■^  ' f***^*»^i 

is-.'  ■;,  „'■  ' w "_  'W:. 


■.yir-rtaxa  ftiagi^feq .. 4Jf>*i  ".-^  :,<£i^;2TVni?A‘M3 

o-qb'a  ,K)0t-88  Jirrew,  ,a;iQLa«j».f^ 


IW70i3£ 


I^vr. -'J  *r’(?4'ia\  ' 4 


I mrtfi  I i/u/v.'  JHHii 


MAIL  TO: 

National  Institute  of  Standards  and  Technology 
Gaithersburg  MD.,  20899 
Metrology  Building,  Rm-A127 
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